function [t] = tran()


t=[    0,    0,    0,    0,    0,    0,    0, 9999,    0,    0,    0,    0,    0,    0,    0
    0,    0,    0,    0,    0,    0,    0, 9952,    0,    0,    0,    0, 9999,    0,    0
    0, 8999,    0,    0,    0,    0,    0, 9999,    0,    0,    0,    0,    0,    0,    0
    0,    0,    0,    0,    0,    0,    0,  167,    0,    0,    0,  472, 9927,    0, 9999
    0,    0,    0,    0,    0,    0,    0,   84,    0,    0,    0,    0, 9999,    0,    0
    0,    0,    0,    0, 4614,    0,    0, 6546,    0,    0,    0,    0,    0,    0, 9999
    0,    0,    0,    0,    0, 8666,    0, 8760,    0,    0,    0,    0, 9999,    0,    0
    0,    0,    0, 3124,    0,    0,    0,    0, 6249,    0, 6718,    0, 7026,    0, 9999
    0,    0,    0,    0,    0,    0,    0,  156,    0,    0,    0, 9735, 9784,    0, 9999
    0,    0,    0,    0,    0,    0,    0,   69,    0,    0,    0,    0, 9999,    0,    0
    0,    0,    0,    0,    0,    0,    0,   72,    0, 8872,    0,    0, 9999,    0,    0
    0,    0,   58,    0,    0,    0,    0,  832,    0,    0,    0, 1288, 8603,    0, 9999
    0,    0,    0,    0,    0,    0,    0,  635,    0,    0,    0,    0,    0, 9135, 9999
    0,    0,    0,    0,    0,    0,    0, 2657,    0,    0,    0, 9294, 9304,    0, 9999
    0,    0,    0,    0,    0,    0, 2585, 9552,    0,    0,    0,    0,    0,    0, 9999];

for i=1:15
  pmin = 1;
  for j=1:15
    c = t(i,j);
    if (c>0)
	   t(i,j) = (c-pmin+1)/9999;
	   pmin = c+1;
    end
  end
end
